home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / misc / amag / AM9505_3.lha / Install < prev    next >
Text File  |  1995-04-18  |  4KB  |  110 lines
  1. ; DataBase Profession Installer Script
  2. ; Frank Neumann, Joerg Richter
  3. ;
  4. ; [...] so many years ago, before the time when we first heard:
  5. ; Welcome to the home by the Sea.  - Genesis, 'Home by the Sea'
  6. ;
  7. ; "Siehst du, Sohn, laß' dir das eine Lehre sein - trinke nie zuviel Tequila, wenn in
  8. ; der Nähe eine Hochzeitskapelle spielt.." - Al Bundy
  9. ;
  10. ; $VER: V2.0 (01.11.94)
  11.  
  12. (set osver (/ (getversion) 65536))
  13. (
  14.  (if (<= osver 36)
  15.   (abort " DataBase benötigt mindestens Workbench 2.04 ")
  16.  )
  17. )
  18.  
  19. (set @default-dest
  20.  (tackon
  21.   (askdir
  22.    (prompt " In welchem Verzeichnis soll DataBase installiert werden ? "
  23.            " \n(Es wird eine eigene Schublade erzeugt) ")
  24.    (help @askdir-help)
  25.    (default "WORK:")
  26.   )
  27.   "DBProDemo"
  28.  )
  29. )
  30.  
  31. (working " Installation der LiesMich-Datei ")
  32. (copyfiles
  33.  (prompt "")
  34.  (help @copyfiles-help)
  35.  (SOURCE "Amiga-Magazin-PD:Liesmich")
  36.  (dest @default-dest)
  37.  (infos)
  38. )
  39.  
  40. (working " Installation des Hauptprogramms ")
  41.  
  42. (set lzrc
  43.         (run ("Amiga-Magazin-PD:c/LHARC >con: -mx x %s %s/" "Amiga-Magazin-PD:DB.lzh" @default-dest)
  44.                 (prompt "Entpacke Archiv 'DB.lzh' nach " @default-dest ".")
  45.                 (help "Keine Hilfe verfügbar.")
  46.         )
  47. )
  48. (if (<> lzrc 0)
  49.         (message "Fehler beim Dekomprimieren des DB-Archivs.")
  50. )
  51.  
  52. (working " Installation der Libraries ")
  53.  
  54. (copylib
  55.  (prompt "")
  56.  (help "DataBase Professional braucht zum Betrieb die reqtools.library. Sie wird in diesem Schritt kopiert.")
  57.  (source "Amiga-Magazin-PD:libs/reqtools.library")
  58.  (dest "libs:")
  59.  (confirm)
  60. )
  61.  
  62. (working " Installation der Schriften ")
  63. (copyfiles
  64.  (prompt " Möchten Sie zusätzliche Schriften installieren ? "
  65.          " \n(Diese werden für einige beigefügte Masken benötigt). ")
  66.  (help "Diese Zeichensätze werden für einige beigefügte Masken benötigt. Ist nun mal so. "
  67.        "\n\nNa gut, etwas förmlicher: Einige der Masken sind für diese Zeichensätze ausgelegt "
  68.        " und Ihre eigenen zukünftigen Masken können Sie damit gestalten.")
  69. (source "Amiga-Magazin-PD:Fonts/")
  70.  (dest "FONTS:")
  71.  (confirm)
  72.  (all)
  73.  (fonts)
  74. )
  75.  
  76. (message "Es werden jetzt die beiliegenden Masken installiert. "
  77.          "Bei Festplatteninstallation sollten Sie den im nachfolgenden "
  78.          "Filerequester vorgeschlagenen Pfad übernehmen "
  79.          "(fahren Sie dazu lediglich mit 'Proceed' fort), "
  80.          "während Sie bei Disketteninstallation eine leere und "
  81.          "formatierte Diskette mit einem beliebigen Verzeichnis "
  82.          "für die Masken verwenden müssen.")
  83.  
  84. (set @example-dest
  85.   (askdir
  86.    (prompt  " In welchem Verzeichnis sollen die beigelegten fertigen Masken installiert werden ? ")
  87.     (help   "Wenn Sie das Programm auf Festplatte installieren, sollten Sie diese Masken dort "
  88.                 "installieren, wo auch das DataBase Professional-Hauptprogramm liegt. "
  89.                 "Wenn Sie auf Disketten installieren, müssen Sie diese auf eine zweite formatierte "
  90.                 "Diskette mit einem beliebigen Verzeichnis für die Masken kopieren." )
  91.    (default @default-dest)
  92.   )
  93. )
  94.  
  95.  
  96. (set lzrc
  97.         (run ("Amiga-Magazin-PD:c/LHARC >con: -mx x %s %s/" "Amiga-Magazin-PD:Masken.lzh" @example-dest)
  98.                 (prompt "Entpacke Archiv 'Masken.lzh' nach " @example-dest ".")
  99.                 (help   "Die beigefügten Masken dienen zur Demonstration von DataBase Professional, "
  100.                 "sind aber auch für den sofortigen Gebrauch geeignet. "
  101.                                 "Wir empfehlen, diese auf jeden Fall zu installieren. " )
  102.         )
  103. )
  104. (if (<> lzrc 0)
  105.         (message "Fehler beim Dekomprimieren des Masken-Archivs.")
  106. )
  107.  
  108. (exit)
  109.  
  110.